(etags-file-of-tag): Fix looking-at regexp.

diff --git a/lisp/progmodes/etags.el b/lisp/progmodes/etags.el
index 62097047dd93bbe0100366655b6eee32b7770dc5..aefa78c33b19cde2640dd55b26a7ca7b14dcc5fa 100644 (file)
--- a/lisp/progmodes/etags.el
+++ b/lisp/progmodes/etags.el
@@ -1000,9 +1000,7 @@ See documentation of variable `tags-file-name'."
 
 (defun etags-file-of-tag ()
   (save-excursion
-    (if (looking-at "./")
-        (re-search-forward "\\([^\n]+\\),[0-9]*\n")
-      (re-search-backward "\f\n\\([^\n]+\\),[0-9]*\n"))
+    (re-search-backward "\f\n\\([^\n]+\\),[0-9]*\n")
     (buffer-substring (match-beginning 1) (match-end 1))))